1// Insert menu illustration scene
2// Created June-August 2001 by Christoph Hormann
3// Updated to 3.7 by Friedrich A. Lohmueller, June-2012.
4
5// ----- material -----
6
7// -w120 -h48 +a0.1 +am2 -j +r3
8
9#version 3.7;
10global_settings{ assumed_gamma 1.0 }
11
12#include "colors.inc"
13
14
15//#declare Typ=1;     // material
16//#declare Typ=2;     // media
17
18
19global_settings {
20  // assumed_gamma 1
21  max_trace_level 5
22}
23
24light_source {
25  <1.5, 0.35, 1.0>*10000
26  color rgb 1.0
27}
28
29camera {
30  location    <22, 20, 7.5>
31  direction   y
32  sky         z
33  up          z
34 right    x*image_width/image_height// right       (120/48)*x
35  look_at     <0, 0, 0>
36  angle       17
37}
38
39sky_sphere {
40  pigment {
41    gradient y
42    color_map {
43      [0.0 rgb <0.6,0.7,1.0>]
44      [1.0 rgb <0.2,0.2,0.8>]
45    }
46  }
47}
48
49// ----------------------------------------
50
51plane
52{
53  z, -1
54  texture
55  {
56    pigment {color rgb 1} //checker color rgb 1 color rgb <0,0,0.1> scale 1.1}
57    finish {
58      diffuse 0.7
59      specular 0.4
60      roughness 0.01
61
62      reflection { 0.5 , 1.0
63        fresnel on
64        metallic 0.8
65      }
66      conserve_energy
67
68    }
69  }
70}
71
72// =============================================
73
74#if(Typ=1)
75
76sphere {
77  <0, 0, 0>, 1.2
78  hollow on
79  texture { pigment { color rgbt 1 } }
80  interior {
81    ior 1.6
82    dispersion 1.2
83  }
84  translate 0.3*z
85}
86
87sphere {
88  <0, 0, 0>, 1.2
89  hollow on
90  texture {
91    pigment {
92      agate
93      color_map {
94        [0.2 rgb 0][0.8 rgb 1]
95      }
96    }
97    finish {
98      diffuse 0
99      ambient 1
100    }
101  }
102  translate <-3.8, 0, 0.3>
103}
104
105sphere {
106  <0, 0, 0>, 1.2
107  hollow on
108  texture {
109    pigment {
110      color Wheat
111    }
112    finish { specular 0.5 }
113    normal { granite 0.75 scale 1.4 }
114  }
115
116  translate <3.6, 0, 0.3>
117}
118
119#end
120
121// =============================================
122
123#if(Typ=2)
124
125sphere {
126  <0, 0, 0>, 1.2
127  hollow on
128  texture { pigment { color rgbt 1 } }
129  interior {
130      media {
131         scattering {1,<0.8, 0.3, 0.0> }
132         method 3
133
134         density {
135           agate
136           color_map{
137             [0.3 rgb 0 ]
138             [0.5 rgb 1 ]
139           }
140           scale 1
141         }
142      }
143  }
144  translate 0.3*z
145}
146
147sphere {
148  <0, 0, 0>, 1.2
149  hollow on
150  texture { pigment { color rgbt 1 } }
151  interior {
152      media {
153              absorption rgb 1.0
154              method 3
155
156              density {
157                agate
158                color_map{
159                  [0.3 rgb 0 ]
160                  [0.5 rgb 1 ]
161                }
162                scale 1
163              }
164      }
165  }
166
167  translate <-3.8, 0, 0.3>
168}
169
170sphere {
171  <0, 0, 0>, 1.2
172  hollow on
173  texture { pigment { color rgbt 1 } }
174  interior {
175      media {
176              emission rgb 1.0
177              method 3
178
179              density {
180                agate
181                color_map{
182                  [0.4 rgb 0 ]
183                  [0.8 rgb <0.4, 0.4, 0.0> ]
184                  [1.0 rgb 1 ]
185                }
186                scale 1
187              }
188      }
189  }
190
191  translate <3.6, 0, 0.3>
192}
193
194#end
195
196// =============================================
197
198